home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 26 / AACD 26.iso / AACD / Games / WHDLoad / Src / sources / hardware.i < prev    next >
Encoding:
Text File  |  2001-08-27  |  11.9 KB  |  610 lines
  1.  IFND    HARDWARE_I
  2. HARDWARE_I = 1
  3. ;*---------------------------------------------------------------------------
  4. ;  :Author.    Bert Jahn
  5. ;  :Contens.    macros hardware related
  6. ;  :EMail.    wepl@kagi.com
  7. ;  :Address.    Franz-Liszt-Straße 16, Rudolstadt, 07404, Germany
  8. ;  :Version.    $Id: hardware.i 1.6 2001/08/27 15:21:23 jah Exp jah $
  9. ;  :History.    17.07.97 separated from whdl_coredump.s
  10. ;        26.12.98 cia names added
  11. ;        18.03.01 input masking of _GetCustomName changed
  12. ;        31.03.01 noop added
  13. ;        13.05.01 sprhdat and bplhdat added
  14. ;        27.08.01 _GetCustomName fixed
  15. ;  :Copyright.    © 1997,1998 Bert Jahn, All Rights Reserved
  16. ;  :Language.    68000 Assembler
  17. ;  :Translator.    Barfly 2.9
  18. ;---------------------------------------------------------------------------*
  19. *##
  20. *##    hardware.i
  21. *##
  22. *##    _customnames    names of custom registers
  23. *##    _GetCustomName    -> name
  24. *##    _cianames    names of cia registers
  25.  
  26.     dc.b    "$Id: hardware.i 1.6 2001/08/27 15:21:23 jah Exp jah $"
  27.     EVEN
  28.  
  29. ;----------------------------------------
  30. ; names of custom registers
  31. ; for using with "Sources:strings.i" _DoString
  32.  
  33.     IFND    noop
  34. noop = $1fe
  35.     ENDC
  36.  
  37. customnames    MACRO
  38.     IFND    CUSTOMNAMES
  39. CUSTOMNAMES = 1
  40.  
  41. _customnames
  42. .base        dc.w    0        ;first
  43.         dc.w    noop/2        ;last
  44.         dc.l    0        ;next list
  45.         dc.w    .000-.base
  46.         dc.w    .002-.base
  47.         dc.w    .004-.base
  48.         dc.w    .006-.base
  49.         dc.w    .008-.base
  50.         dc.w    .00a-.base
  51.         dc.w    .00c-.base
  52.         dc.w    .00e-.base
  53.         dc.w    .010-.base
  54.         dc.w    .012-.base
  55.         dc.w    .014-.base
  56.         dc.w    .016-.base
  57.         dc.w    .018-.base
  58.         dc.w    .01a-.base
  59.         dc.w    .01c-.base
  60.         dc.w    .01e-.base
  61.         dc.w    .020-.base
  62.         dc.w    .022-.base
  63.         dc.w    .024-.base
  64.         dc.w    .026-.base
  65.         dc.w    .028-.base
  66.         dc.w    .02a-.base
  67.         dc.w    .02c-.base
  68.         dc.w    .02e-.base
  69.         dc.w    .030-.base
  70.         dc.w    .032-.base
  71.         dc.w    .034-.base
  72.         dc.w    .036-.base
  73.         dc.w    .038-.base
  74.         dc.w    .03a-.base
  75.         dc.w    .03c-.base
  76.         dc.w    .03e-.base
  77.         dc.w    .040-.base
  78.         dc.w    .042-.base
  79.         dc.w    .044-.base
  80.         dc.w    .046-.base
  81.         dc.w    .048-.base
  82.         dc.w    .04a-.base
  83.         dc.w    .04c-.base
  84.         dc.w    .04e-.base
  85.         dc.w    .050-.base
  86.         dc.w    .052-.base
  87.         dc.w    .054-.base
  88.         dc.w    .056-.base
  89.         dc.w    .058-.base
  90.         dc.w    .05a-.base
  91.         dc.w    .05c-.base
  92.         dc.w    .05e-.base
  93.         dc.w    .060-.base
  94.         dc.w    .062-.base
  95.         dc.w    .064-.base
  96.         dc.w    .066-.base
  97.         dc.w    0
  98.         dc.w    0
  99.         dc.w    0
  100.         dc.w    0
  101.         dc.w    .070-.base
  102.         dc.w    .072-.base
  103.         dc.w    .074-.base
  104.         dc.w    0
  105.         dc.w    .078-.base
  106.         dc.w    .07a-.base
  107.         dc.w    .07c-.base
  108.         dc.w    .07e-.base
  109.         dc.w    .080-.base
  110.         dc.w    .082-.base
  111.         dc.w    .084-.base
  112.         dc.w    .086-.base
  113.         dc.w    .088-.base
  114.         dc.w    .08a-.base
  115.         dc.w    .08c-.base
  116.         dc.w    .08e-.base
  117.         dc.w    .090-.base
  118.         dc.w    .092-.base
  119.         dc.w    .094-.base
  120.         dc.w    .096-.base
  121.         dc.w    .098-.base
  122.         dc.w    .09a-.base
  123.         dc.w    .09c-.base
  124.         dc.w    .09e-.base
  125.         dc.w    .0a0-.base
  126.         dc.w    .0a2-.base
  127.         dc.w    .0a4-.base
  128.         dc.w    .0a6-.base
  129.         dc.w    .0a8-.base
  130.         dc.w    .0aa-.base
  131.         dc.w    0
  132.         dc.w    0
  133.         dc.w    .0b0-.base
  134.         dc.w    .0b2-.base
  135.         dc.w    .0b4-.base
  136.         dc.w    .0b6-.base
  137.         dc.w    .0b8-.base
  138.         dc.w    .0ba-.base
  139.         dc.w    0
  140.         dc.w    0
  141.         dc.w    .0c0-.base
  142.         dc.w    .0c2-.base
  143.         dc.w    .0c4-.base
  144.         dc.w    .0c6-.base
  145.         dc.w    .0c8-.base
  146.         dc.w    .0ca-.base
  147.         dc.w    0
  148.         dc.w    0
  149.         dc.w    .0d0-.base
  150.         dc.w    .0d2-.base
  151.         dc.w    .0d4-.base
  152.         dc.w    .0d6-.base
  153.         dc.w    .0d8-.base
  154.         dc.w    .0da-.base
  155.         dc.w    0
  156.         dc.w    0
  157.         dc.w    .0e0-.base
  158.         dc.w    .0e2-.base
  159.         dc.w    .0e4-.base
  160.         dc.w    .0e6-.base
  161.         dc.w    .0e8-.base
  162.         dc.w    .0ea-.base
  163.         dc.w    .0ec-.base
  164.         dc.w    .0ee-.base
  165.         dc.w    .0f0-.base
  166.         dc.w    .0f2-.base
  167.         dc.w    .0f4-.base
  168.         dc.w    .0f6-.base
  169.         dc.w    .0f8-.base
  170.         dc.w    .0fa-.base
  171.         dc.w    .0fc-.base
  172.         dc.w    .0fe-.base
  173.         dc.w    .100-.base
  174.         dc.w    .102-.base
  175.         dc.w    .104-.base
  176.         dc.w    .106-.base
  177.         dc.w    .108-.base
  178.         dc.w    .10a-.base
  179.         dc.w    .10c-.base
  180.         dc.w    .10e-.base
  181.         dc.w    .110-.base
  182.         dc.w    .112-.base
  183.         dc.w    .114-.base
  184.         dc.w    .116-.base
  185.         dc.w    .118-.base
  186.         dc.w    .11a-.base
  187.         dc.w    .11c-.base
  188.         dc.w    .11e-.base
  189.         dc.w    .120-.base
  190.         dc.w    .122-.base
  191.         dc.w    .124-.base
  192.         dc.w    .126-.base
  193.         dc.w    .128-.base
  194.         dc.w    .12a-.base
  195.         dc.w    .12c-.base
  196.         dc.w    .12e-.base
  197.         dc.w    .130-.base
  198.         dc.w    .132-.base
  199.         dc.w    .134-.base
  200.         dc.w    .136-.base
  201.         dc.w    .138-.base
  202.         dc.w    .13a-.base
  203.         dc.w    .13c-.base
  204.         dc.w    .13e-.base
  205.         dc.w    .140-.base
  206.         dc.w    .142-.base
  207.         dc.w    .144-.base
  208.         dc.w    .146-.base
  209.         dc.w    .148-.base
  210.         dc.w    .14a-.base
  211.         dc.w    .14c-.base
  212.         dc.w    .14e-.base
  213.         dc.w    .150-.base
  214.         dc.w    .152-.base
  215.         dc.w    .154-.base
  216.         dc.w    .156-.base
  217.         dc.w    .158-.base
  218.         dc.w    .15a-.base
  219.         dc.w    .15c-.base
  220.         dc.w    .15e-.base
  221.         dc.w    .160-.base
  222.         dc.w    .162-.base
  223.         dc.w    .164-.base
  224.         dc.w    .166-.base
  225.         dc.w    .168-.base
  226.         dc.w    .16a-.base
  227.         dc.w    .16c-.base
  228.         dc.w    .16e-.base
  229.         dc.w    .170-.base
  230.         dc.w    .172-.base
  231.         dc.w    .174-.base
  232.         dc.w    .176-.base
  233.         dc.w    .178-.base
  234.         dc.w    .17a-.base
  235.         dc.w    .17c-.base
  236.         dc.w    .17e-.base
  237.         dc.w    .180-.base
  238.         dc.w    .182-.base
  239.         dc.w    .184-.base
  240.         dc.w    .186-.base
  241.         dc.w    .188-.base
  242.         dc.w    .18a-.base
  243.         dc.w    .18c-.base
  244.         dc.w    .18e-.base
  245.         dc.w    .190-.base
  246.         dc.w    .192-.base
  247.         dc.w    .194-.base
  248.         dc.w    .196-.base
  249.         dc.w    .198-.base
  250.         dc.w    .19a-.base
  251.         dc.w    .19c-.base
  252.         dc.w    .19e-.base
  253.         dc.w    .1a0-.base
  254.         dc.w    .1a2-.base
  255.         dc.w    .1a4-.base
  256.         dc.w    .1a6-.base
  257.         dc.w    .1a8-.base
  258.         dc.w    .1aa-.base
  259.         dc.w    .1ac-.base
  260.         dc.w    .1ae-.base
  261.         dc.w    .1b0-.base
  262.         dc.w    .1b2-.base
  263.         dc.w    .1b4-.base
  264.         dc.w    .1b6-.base
  265.         dc.w    .1b8-.base
  266.         dc.w    .1ba-.base
  267.         dc.w    .1bc-.base
  268.         dc.w    .1be-.base
  269.         dc.w    .1c0-.base
  270.         dc.w    .1c2-.base
  271.         dc.w    .1c4-.base
  272.         dc.w    .1c6-.base
  273.         dc.w    .1c8-.base
  274.         dc.w    .1ca-.base
  275.         dc.w    .1cc-.base
  276.         dc.w    .1ce-.base
  277.         dc.w    .1d0-.base
  278.         dc.w    .1d2-.base
  279.         dc.w    .1d4-.base
  280.         dc.w    .1d6-.base
  281.         dc.w    .1d8-.base
  282.         dc.w    .1da-.base
  283.         dc.w    .1dc-.base
  284.         dc.w    .1de-.base
  285.         dc.w    .1e0-.base
  286.         dc.w    .1e2-.base
  287.         dc.w    .1e4-.base
  288.         dc.w    0
  289.         dc.w    0
  290.         dc.w    0
  291.         dc.w    0
  292.         dc.w    0
  293.         dc.w    0
  294.         dc.w    0
  295.         dc.w    0
  296.         dc.w    0
  297.         dc.w    0
  298.         dc.w    0
  299.         dc.w    .1fc-.base
  300.         dc.w    .1fe-.base
  301. .000        dc.b    "bltddat",0
  302. .002        dc.b    "dmaconr",0
  303. .004        dc.b    "vposr",0
  304. .006        dc.b    "vhposr",0
  305. .008        dc.b    "dskdatr",0
  306. .00a        dc.b    "joy0dat",0
  307. .00c        dc.b    "joy1dat",0
  308. .00e        dc.b    "clxdat",0
  309. .010        dc.b    "adkconr",0
  310. .012        dc.b    "pot0dat",0
  311. .014        dc.b    "pot1dat",0
  312. .016        dc.b    "potinp",0
  313. .018        dc.b    "serdatr",0
  314. .01a        dc.b    "dskbytr",0
  315. .01c        dc.b    "intenar",0
  316. .01e        dc.b    "intreqr",0
  317. .020        dc.b    "dskpt",0
  318. .022        dc.b    "dskptl",0
  319. .024        dc.b    "dsklen",0
  320. .026        dc.b    "dskdat",0
  321. .028        dc.b    "refptr",0
  322. .02a        dc.b    "vposw",0
  323. .02c        dc.b    "vhposw",0
  324. .02e        dc.b    "copcon",0
  325. .030        dc.b    "serdat",0
  326. .032        dc.b    "serper",0
  327. .034        dc.b    "potgo",0
  328. .036        dc.b    "joytest",0
  329. .038        dc.b    "strequ",0
  330. .03a        dc.b    "strvbl",0
  331. .03c        dc.b    "strhor",0
  332. .03e        dc.b    "strlong",0
  333. .040        dc.b    "bltcon0",0
  334. .042        dc.b    "bltcon1",0
  335. .044        dc.b    "bltafwm",0
  336. .046        dc.b    "bltalwm",0
  337. .048        dc.b    "bltcpt",0
  338. .04a        dc.b    "bltcptl",0
  339. .04c        dc.b    "bltbpt",0
  340. .04e        dc.b    "bltbptl",0
  341. .050        dc.b    "bltapt",0
  342. .052        dc.b    "bltaptl",0
  343. .054        dc.b    "bltdpt",0
  344. .056        dc.b    "bltdptl",0
  345. .058        dc.b    "bltsize",0
  346. .05a        dc.b    "bltcon0l",0
  347. .05c        dc.b    "bltsizv",0
  348. .05e        dc.b    "bltsizh",0
  349. .060        dc.b    "bltcmod",0
  350. .062        dc.b    "bltbmod",0
  351. .064        dc.b    "bltamod",0
  352. .066        dc.b    "bltdmod",0
  353. .070        dc.b    "bltcdat",0
  354. .072        dc.b    "bltbdat",0
  355. .074        dc.b    "bltadat",0
  356. .078        dc.b    "sprhdat",0
  357. .07a        dc.b    "bplhdat",0
  358. .07c        dc.b    "deniseid",0
  359. .07e        dc.b    "dsksync",0
  360. .080        dc.b    "cop1lc",0
  361. .082        dc.b    "cop1lcl",0
  362. .084        dc.b    "cop2lc",0
  363. .086        dc.b    "cop2lcl",0
  364. .088        dc.b    "copjmp1",0
  365. .08a        dc.b    "copjmp2",0
  366. .08c        dc.b    "copins",0
  367. .08e        dc.b    "diwstrt",0
  368. .090        dc.b    "diwstop",0
  369. .092        dc.b    "ddfstrt",0
  370. .094        dc.b    "ddfstop",0
  371. .096        dc.b    "dmacon",0
  372. .098        dc.b    "clxcon",0
  373. .09a        dc.b    "intena",0
  374. .09c        dc.b    "intreq",0
  375. .09e        dc.b    "adkcon",0
  376. .0a0        dc.b    "aud0pt",0
  377. .0a2        dc.b    "aud0ptl",0
  378. .0a4        dc.b    "aud0len",0
  379. .0a6        dc.b    "aud0per",0
  380. .0a8        dc.b    "aud0vol",0
  381. .0aa        dc.b    "aud0dat",0
  382. .0b0        dc.b    "aud1pt",0
  383. .0b2        dc.b    "aud1ptl",0
  384. .0b4        dc.b    "aud1len",0
  385. .0b6        dc.b    "aud1per",0
  386. .0b8        dc.b    "aud1vol",0
  387. .0ba        dc.b    "aud1dat",0
  388. .0c0        dc.b    "aud2pt",0
  389. .0c2        dc.b    "aud2ptl",0
  390. .0c4        dc.b    "aud2len",0
  391. .0c6        dc.b    "aud2per",0
  392. .0c8        dc.b    "aud2vol",0
  393. .0ca        dc.b    "aud2dat",0
  394. .0d0        dc.b    "aud3pt",0
  395. .0d2        dc.b    "aud3ptl",0
  396. .0d4        dc.b    "aud3len",0
  397. .0d6        dc.b    "aud3per",0
  398. .0d8        dc.b    "aud3vol",0
  399. .0da        dc.b    "aud3dat",0
  400. .0e0        dc.b    "bpl1pt",0
  401. .0e2        dc.b    "bpl1ptl",0
  402. .0e4        dc.b    "bpl2pt",0
  403. .0e6        dc.b    "bpl2ptl",0
  404. .0e8        dc.b    "bpl3pt",0
  405. .0ea        dc.b    "bpl3ptl",0
  406. .0ec        dc.b    "bpl4pt",0
  407. .0ee        dc.b    "bpl4ptl",0
  408. .0f0        dc.b    "bpl5pt",0
  409. .0f2        dc.b    "bpl5ptl",0
  410. .0f4        dc.b    "bpl6pt",0
  411. .0f6        dc.b    "bpl6ptl",0
  412. .0f8        dc.b    "bpl7pt",0
  413. .0fa        dc.b    "bpl7ptl",0
  414. .0fc        dc.b    "bpl8pt",0
  415. .0fe        dc.b    "bpl8ptl",0
  416. .100        dc.b    "bplcon0",0
  417. .102        dc.b    "bplcon1",0
  418. .104        dc.b    "bplcon2",0
  419. .106        dc.b    "bplcon3",0
  420. .108        dc.b    "bpl1mod",0
  421. .10a        dc.b    "bpl2mod",0
  422. .10c        dc.b    "bplcon4",0
  423. .10e        dc.b    "clxcon2",0
  424. .110        dc.b    "bpl0dat",0
  425. .112        dc.b    "bpl1dat",0
  426. .114        dc.b    "bpl2dat",0
  427. .116        dc.b    "bpl3dat",0
  428. .118        dc.b    "bpl4dat",0
  429. .11a        dc.b    "bpl5dat",0
  430. .11c        dc.b    "bpl6dat",0
  431. .11e        dc.b    "bpl7dat",0
  432. .120        dc.b    "spr0pt",0
  433. .122        dc.b    "spr0ptl",0
  434. .124        dc.b    "spr1pt",0
  435. .126        dc.b    "spr1ptl",0
  436. .128        dc.b    "spr2pt",0
  437. .12a        dc.b    "spr2ptl",0
  438. .12c        dc.b    "spr3pt",0
  439. .12e        dc.b    "spr3ptl",0
  440. .130        dc.b    "spr4pt",0
  441. .132        dc.b    "spr4ptl",0
  442. .134        dc.b    "spr5pt",0
  443. .136        dc.b    "spr5ptl",0
  444. .138        dc.b    "spr6pt",0
  445. .13a        dc.b    "spr6ptl",0
  446. .13c        dc.b    "spr7pt",0
  447. .13e        dc.b    "spr7ptl",0
  448. .140        dc.b    "spr0pos",0
  449. .142        dc.b    "spr0ctl",0
  450. .144        dc.b    "spr0data",0
  451. .146        dc.b    "spr0datb",0
  452. .148        dc.b    "spr1pos",0
  453. .14a        dc.b    "spr1ctl",0
  454. .14c        dc.b    "spr1data",0
  455. .14e        dc.b    "spr1datb",0
  456. .150        dc.b    "spr2pos",0
  457. .152        dc.b    "spr2ctl",0
  458. .154        dc.b    "spr2data",0
  459. .156        dc.b    "spr2datb",0
  460. .158        dc.b    "spr3pos",0
  461. .15a        dc.b    "spr3ctl",0
  462. .15c        dc.b    "spr3data",0
  463. .15e        dc.b    "spr3datb",0
  464. .160        dc.b    "spr4pos",0
  465. .162        dc.b    "spr4ctl",0
  466. .164        dc.b    "spr4data",0
  467. .166        dc.b    "spr4datb",0
  468. .168        dc.b    "spr5pos",0
  469. .16a        dc.b    "spr5ctl",0
  470. .16c        dc.b    "spr5data",0
  471. .16e        dc.b    "spr5datb",0
  472. .170        dc.b    "spr6pos",0
  473. .172        dc.b    "spr6ctl",0
  474. .174        dc.b    "spr6data",0
  475. .176        dc.b    "spr6datb",0
  476. .178        dc.b    "spr7pos",0
  477. .17a        dc.b    "spr7ctl",0
  478. .17c        dc.b    "spr7data",0
  479. .17e        dc.b    "spr7datb",0
  480. .180        dc.b    "color00",0
  481. .182        dc.b    "color01",0
  482. .184        dc.b    "color02",0
  483. .186        dc.b    "color03",0
  484. .188        dc.b    "color04",0
  485. .18a        dc.b    "color05",0
  486. .18c        dc.b    "color06",0
  487. .18e        dc.b    "color07",0
  488. .190        dc.b    "color08",0
  489. .192        dc.b    "color09",0
  490. .194        dc.b    "color10",0
  491. .196        dc.b    "color11",0
  492. .198        dc.b    "color12",0
  493. .19a        dc.b    "color13",0
  494. .19c        dc.b    "color14",0
  495. .19e        dc.b    "color15",0
  496. .1a0        dc.b    "color16",0
  497. .1a2        dc.b    "color17",0
  498. .1a4        dc.b    "color18",0
  499. .1a6        dc.b    "color19",0
  500. .1a8        dc.b    "color20",0
  501. .1aa        dc.b    "color21",0
  502. .1ac        dc.b    "color22",0
  503. .1ae        dc.b    "color23",0
  504. .1b0        dc.b    "color24",0
  505. .1b2        dc.b    "color25",0
  506. .1b4        dc.b    "color26",0
  507. .1b6        dc.b    "color27",0
  508. .1b8        dc.b    "color28",0
  509. .1ba        dc.b    "color29",0
  510. .1bc        dc.b    "color30",0
  511. .1be        dc.b    "color31",0
  512. .1c0        dc.b    "htotal",0
  513. .1c2        dc.b    "hsstop",0
  514. .1c4        dc.b    "hbstrt",0
  515. .1c6        dc.b    "hbstop",0
  516. .1c8        dc.b    "vtotal",0
  517. .1ca        dc.b    "vsstop",0
  518. .1cc        dc.b    "vbstrt",0
  519. .1ce        dc.b    "vbstop",0
  520. .1d0        dc.b    "sprhstrt",0
  521. .1d2        dc.b    "sprhstop",0
  522. .1d4        dc.b    "bplhstrt",0
  523. .1d6        dc.b    "bplhstop",0
  524. .1d8        dc.b    "hhposw",0
  525. .1da        dc.b    "hhposr",0
  526. .1dc        dc.b    "beamcon0",0
  527. .1de        dc.b    "hsstrt",0
  528. .1e0        dc.b    "vsstrt",0
  529. .1e2        dc.b    "hcenter",0
  530. .1e4        dc.b    "diwhigh",0
  531. .1fc        dc.b    "fmode",0
  532. .1fe        dc.b    "noop",0
  533.     EVEN
  534.     ENDC
  535.         ENDM
  536.  
  537. ;----------------------------------------
  538. ; return name custom register
  539. ; IN:    d0 =  UWORD  offset of custom register
  540. ; OUT:    d0 =  CPTR   name of register
  541.  
  542. GetCustomName    MACRO
  543.     IFND    GETCUSTOMNAME
  544. GETCUSTOMNAME=1
  545.         IFND    CUSTOMNAMES
  546.             customnames
  547.         ENDC
  548.         IFND    DOSTRINGNULL
  549.             DoStringNull
  550.         ENDC
  551.  
  552. _GetCustomName    and.l    #$000001ff,d0
  553.         lsr.l    #1,d0
  554.         lea    (_customnames),a0
  555.         bra    _DoStringNull
  556.     ENDC
  557.     ENDM
  558.  
  559. ;----------------------------------------
  560. ; names of cia registers
  561. ; for using with "Sources:strings.i" _DoString
  562.  
  563. cianames    MACRO
  564.     IFND    CIANAMES
  565. CIANAMES = 1
  566.  
  567. _cianames
  568. .base        dc.w    0        ;first
  569.         dc.w    $f        ;last
  570.         dc.l    0        ;next list
  571.         dc.w    .0-.base
  572.         dc.w    .1-.base
  573.         dc.w    .2-.base
  574.         dc.w    .3-.base
  575.         dc.w    .4-.base
  576.         dc.w    .5-.base
  577.         dc.w    .6-.base
  578.         dc.w    .7-.base
  579.         dc.w    .8-.base
  580.         dc.w    .9-.base
  581.         dc.w    .a-.base
  582.         dc.w    0
  583.         dc.w    .c-.base
  584.         dc.w    .d-.base
  585.         dc.w    .e-.base
  586.         dc.w    .f-.base
  587. .0        dc.b    "pra",0
  588. .1        dc.b    "prb",0
  589. .2        dc.b    "ddra",0
  590. .3        dc.b    "ddrb",0
  591. .4        dc.b    "talo",0
  592. .5        dc.b    "tahi",0
  593. .6        dc.b    "tblo",0
  594. .7        dc.b    "tbhi",0
  595. .8        dc.b    "todlow",0
  596. .9        dc.b    "todmid",0
  597. .a        dc.b    "todhi",0
  598. .c        dc.b    "sdr",0
  599. .d        dc.b    "icr",0
  600. .e        dc.b    "cra",0
  601. .f        dc.b    "crb",0
  602.     EVEN
  603.     ENDC
  604.         ENDM
  605.         
  606. ;---------------------------------------------------------------------------
  607.  
  608.     ENDC
  609.  
  610.